﻿<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%option explicit%>
<% Response.CodePage=65001%> 
<% Response.Charset="UTF-8" %> 
<%
'作者：山林客（ah_bill）
'博客：http://ruizhinet.blog.163.com
'网站：http://www.ruizhinet.cn
'本信息不会影响您网站的正常访问，请保留
Dim msg
msg=request.querystring("msg")
Dim cnmsg
SELECT CASE msg
CASE "ParameterError"
	cnmsg="参数错误"
CASE "DatabaseError"
	cnmsg="数据库操作异常，操作被终止"
CASE "NoRecord"
	cnmsg="没有找到对应的记录"
CASE "ModifySuccess"
	cnmsg="修改成功"
CASE "LoginFail"
	cnmsg="登录失败，请检查帐号和密码"
CASE "RemoveSuccess"
	cnmsg="删除成功"
CASE "AddSuccess"
	cnmsg="添加成功"
CASE "UnionSuccess"
	cnmsg="合并成功"
CASE "MoveSuccess"
	cnmsg="移动记录成功"
CASE "NoFenlei"
	cnmsg="没有符合条件的分类，请先创建分类"
CASE "DataError"
	cnmsg="数据库操作失败"
CASE "DoubleError"
	cnmsg="记录重复"
CASE "LoginFail"
	cnmsg="用户名或密码错误，请<a href=login.asp>重新登录</a>"
CASE "IsLogin"
	cnmsg="用户已经登录，请不要重复登录！"
CASE "RefreshSuccess"
	cnmsg="刷新成功！"
CASE ELSE
	cnmsg="参数错误"
END SELECT
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>操作结果</title>
<%If cnmsg<>"参数错误" Then %>
<meta http-equiv="refresh" content="1;url=<%=request.querystring("from")%>?id=<%=request.querystring("id")%>&lang=<%=request.querystring("lang")%>"> 
<%End If%>
</head>
<link type="text/css" href="style/style.css" rel="stylesheet" rev="stylesheet"/>
</head>
<body>
<br/>
<br/>
<br/>
<br/>
<table class="table_500" cellspacing="0" cellpadding="0">
 <tr>
	<th>操作结果</th>
 </tr>
 <tr>
	<td class="tdcenter"><%=cnmsg%></td>
 </tr>
 </table>
</body>
</html>